home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d22 / ds320.arc / LOGI.DEF < prev    next >
Encoding:
Text File  |  1989-02-09  |  6.4 KB  |  180 lines
  1. ;Edited for distribution October 19, 1987
  2. ;
  3. ;This is DS.DEF     Source code for DS.MNU   Version 1.2
  4. ;
  5. ;
  6. ;                    DIRECTORY SCANNER PULL-DOWN MENUS
  7. ;                                  by
  8. ; 
  9. ;                            Tom LaChe' 
  10. ;                            460 Belvedere East
  11. ;                            Colgate,  WI  53017
  12. ;
  13. ;                            July 15, 1987
  14. ;             
  15. ;                     For the Logitech Logimouse C7
  16. ;                         UPLOADED TO EXEC-PC
  17. ;
  18. ; Author's Note: If this wonderful piece of work is to function properly, you
  19. ;   MUST have your PATH setup to find the programs which some of the menus
  20. ;   call. The programs called are: Format.com, Chkdsk.com, Pkxarc.com,
  21. ;   Diskcopy.com, Label.com and Click.com and Menu.com for the electronic
  22. ;   rodent.
  23. ;   My PATH looks like this: PATH=C:\;C:\DOS;C:\UTILITY;C:\MOUSE;C:\MOUSE\MENU
  24. ;
  25. BEGIN  LeftB, MiddleB, RightB, LeftM, RightM, UpM, DownM, 70,30
  26. CHORDS LMB, LRB, MRB, ALLB
  27.  
  28. ;***** BUTTON ASSIGNMENTS *****
  29.  
  30. LeftB:   TYPE ENTER       ;Enter
  31. MiddleB: EXECUTE OPTION   ;OPTION MENU
  32. RightB:  TYPE ESC         ;Escape
  33.  
  34. ;***** MOVE ASSIGNMENTS *****
  35.  
  36. LeftM:   TYPE 0,75     ;Move Left
  37. RightM:  TYPE 0,77     ;Move Right
  38. UpM:     TYPE 0,72     ;Move Up
  39. DownM:   TYPE 0,80     ;Move Down
  40. UpMV:    TYPE 0,59     ;Move Up In Dir
  41. DownMV:  TYPE 0,60     ;Move Down In Dir
  42. LeftMV:  NOTHING       ;Do Nothing
  43. RightMV: NOTHING       ;Do Nothing
  44.  
  45. ;***** CHORD ASSIGNMENTS *****
  46.  
  47. LMB:    EXECUTE DIRS   ;Left & Middle Buttons
  48. LRB:    EXECUTE TAG    ;Left & Right Buttons
  49. MRB:    EXECUTE FILS   ;Middle & Right Buttons
  50. ALLB:   EXECUTE UTAG   ;All Buttons
  51.  
  52. DIRS:   ASSIGN LeftB, MiddleB, RightB, LeftMV, RightMV, UpMV, DownMV
  53. FILS:   ASSIGN LeftB, MiddleB, RightB, LeftM,  RightM,  UpM,  DownM
  54.  
  55.  
  56. OPTION: POPUP 1, 5, 14
  57. TEXT "OPTIONS ---->EXIT   Commands  Drive change  DOS-Cmds  Misc.  HELP!"
  58.           SELECT 1, 14, 4,
  59.           SELECT 1, 21, 8,    CMD
  60.           SELECT 1, 31, 12,   DRV
  61.           SELECT 1, 45, 8,    DOS
  62.           SELECT 1, 55, 5,    MISC
  63.           SELECT 1, 62, 5,    HELP
  64.           PEND
  65.  
  66. CMD: MENU "Commands", 2, 17, 14
  67.           OPTION "             ",
  68.           OPTION "Copy Tagged",   CTAG
  69.           OPTION "Delete Tagged", DTAG
  70.           OPTION "Move Tagged",   MTAG
  71.           OPTION "Print Tagged",  PTAG
  72.           OPTION "─────────────",
  73.           OPTION "Copy File",     CFILE
  74.           OPTION "Delete File",   DFILE
  75.           OPTION "Move File",     MFILE
  76.           OPTION "Print File",    PFILE
  77.           OPTION "List File",     LFILE
  78.           OPTION "Edit File",     EFILE
  79.           OPTION "Find File",     FFILE
  80.           OPTION "Rename File",   RFILE
  81.           OPTION "Execute File",  XFILE
  82.           OPTION "De─Arc File",   DARC
  83.           OPTION "Enter Command", CDOS
  84.           MEND
  85.  
  86. DRV: MENU "Select Drive", 2, 34, 14
  87.           OPTION "        "
  88.           OPTION "Drive A:",   CHDRVA
  89.           OPTION "Drive B:",   CHDRVB
  90.           OPTION "Drive C:",   CHDRVC
  91.           OPTION "Drive D:",   CHDRVD
  92.           MEND
  93.  
  94. HELP: POPUP  2, 10, 14 ;Vert Horiz Color
  95.   TEXT "╔═════════════════════════════════════════════════════════╗"
  96.   TEXT "║  Using The Mouse With DIRECTORY SCANNER  By Tom LaChe'  ║"
  97.   TEXT "╠═════════════════════════════════════════════════════════╣"
  98.   TEXT "║ ██   ██ ███████ ████      ████   █████  ██   ██ ███████ ║"
  99.   TEXT "║ ██   ██  ██   █  ██      ██  ██ ██   ██ ███ ███  ██   █ ║"
  100.   TEXT "║ ██   ██  ██ █    ██     ██      ██   ██ ███████  ██ █   ║"
  101.   TEXT "║ ██ █ ██  ████    ██     ██      ██   ██ ███████  ████   ║"
  102.   TEXT "║ ███████  ██ █    ██   █ ██      ██   ██ ██ █ ██  ██ █   ║"
  103.   TEXT "║ ███ ███  ██   █  ██  ██  ██  ██ ██   ██ ██   ██  ██   █ ║"
  104.   TEXT "║ ██   ██ ███████ ███████   ████   █████  ██   ██ ███████ ║"
  105.   TEXT "╠════════════════════════════╕╒═══════════════════════════╣"
  106.   TEXT "║     BUTTON ASSIGNMENTS     ││    CHORD ASSIGNMENTS      ║"
  107.   TEXT "╟────────────────────────────┤├───────────────────────────╢"
  108.   TEXT "║   Left Button...ENTER      ││Left & Middle..CHOOSE DIR  ║"
  109.   TEXT "║   Middle Button..MENU      ││Middle & Right.CHOOSE FILE ║"
  110.   TEXT "║   Right Button..ESCAPE     ││Left & Right.....TAG FILE  ║"
  111.   TEXT "║                            ││All Together...UNTAG FILES ║"
  112.   TEXT "╚════════════════════════════╧╧═══════════════════════════╝"
  113.           SELECT 2, 3, 55
  114.           PEND
  115.                   ; I bet you wonder how I made this graphic.
  116.  
  117. DOS: MENU "DOS Commands", 2, 50, 14
  118.           OPTION "             "
  119.           OPTION "Format A:",      FORMA
  120.           OPTION "Format B:",      FORMB
  121.           OPTION "Diskcopy A: B:", DCOPY
  122.           OPTION "Check_disk",     CHDSK
  123.           OPTION "Label_Disk A:",  LABEL
  124.           MEND
  125.  
  126.  
  127. MISC: MENU "Mouse Commands", 2, 61, 14
  128.          OPTION "           ",
  129.          OPTION " Load New Menu ",  LMENU
  130.          OPTION " Load Click",      CLON
  131.          OPTION " CLICK OFF ",      CLOF
  132.          MEND
  133.  
  134. ;***** LABEL ASSIGNMENTS *****
  135.  
  136. CHDRVA: TYPE "DA", ENTER     ;CHANGE TO DRIVE A:
  137. CHDRVB: TYPE "DB", ENTER     ;CHANGE TO DRIVE B:
  138. CHDRVC: TYPE "DC", ENTER     ;CHANGE TO DRIVE C:
  139. CHDRVD: TYPE "DD", ENTER     ;CHANGE TO DRIVE D:
  140. CTAG:   TYPE 0,46            ;ALT-C  Copy Function
  141. DTAG:   TYPE 0,32            ;ALT-D  Delete Function
  142. UTAG:   TYPE 0,22            ;ALT-U  Untag Files
  143. MTAG:   TYPE "M"             ;Move File
  144. PTAG:   TYPE "P"             ;Print File
  145. LFILE:  TYPE "L"             ;List File
  146. EFILE:  TYPE "E"             ;Edit File
  147. FFILE:  TYPE "F"             ;Find File
  148. RFILE:  TYPE "R"             ;Rename File
  149. XFILE:  TYPE "X"             ;Execute File
  150. CDOS:   TYPE "C"             ;Dos Commands
  151. TAG:    TYPE "T"             ;Tag File
  152. EXIT:   TYPE 0,67            ;Exit to Dos
  153. FMTA:   TYPE "FORMAT A:", ENTER
  154. FMTB:   TYPE "FORMAT B:", ENTER
  155. COPY:   TYPE "DISKCOPY A: B:", ENTER
  156. CDSK:   TYPE "CHKDSK "
  157. LAB:    TYPE "LABEL A:",ENTER
  158. CLION:  TYPE "CLICK", ENTER, ENTER
  159. CLIOF:  TYPE "CLICK OFF", ENTER, ENTER
  160. LMU:    TYPE "MENU "
  161. PKXARC: TYPE "PKXARC "
  162. CFILE:  EXECUTE TAG, CTAG
  163. DFILE:  EXECUTE TAG, DTAG
  164. MFILE:  EXECUTE TAG, MTAG
  165. PFILE:  EXECUTE TAG, PTAG
  166. FORMA:  EXECUTE CDOS, FMTA
  167. FORMB:  EXECUTE CDOS, FMTB
  168. CHDSK:  EXECUTE CDOS, CDSK
  169. LABEL:  EXECUTE CDOS, LAB
  170. DCOPY:  EXECUTE CDOS, COPY
  171. LMENU:  EXECUTE CDOS, LMU
  172. CLON:   EXECUTE CDOS, CLION
  173. CLOF:   EXECUTE CDOS, CLIOF
  174. DARC:   EXECUTE CDOS, PKXARC
  175.  
  176.  
  177.  
  178.  
  179. 
  180.